Top 10k strings from Traga-Perras (1996)(Gabriel Rodriguez Calzada)(128k)(es).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
20 0;"1 2 3 4 5 6 7 8 9 10" 2 ;"Premio"; 2 "1g1G","1f1F","1d1D": 1 |8E9E9E9E9 1 TRAGA-PERRAS GRC 1996 1 PREMIO ALEATORIO 1 LA LOTERIA 1 LA ESCALERA 1 ET v=247: LET w=248: LET rr 1 EMIO MAXIMO ": NEXT F: CLS 1 DATAS GRAFICAS 1 D *18); INK ( RND *7);" PR 1 CONTINUACION ESCALERA 1 ;"Total = "; 1 ;"Pulsa SPACE para PARAR" 1 ;"Premio == 50": 1 ;"Premio = "; 1 ;"P-TODO"; 1 ;"Numero(1-10)=";q;" Premio=";p; 1 ;"Mayor(+)Menor(-)Cobrar(C)"; 1 ;"LA LOTERIA": 1 ;"LA - RUEDA": 1 ;"Escalera" 1 ;"Doble Nada Escalera Premio" 1 ;"1 2 3 4 5 6 7 8 9 10" 1 ;"(15-JULIO-1996)" 1 ;" para seguir" 1 ;" para cobrar" 1 ;" SPACE"; 1 ;" Disponible version para 1 ;" Programa realizado por 1 73 IF x=7 THEN LET u=235 1 72 IF x=4 OR x=5 THEN LET u=23 1 71 IF x=1 OR x=2 OR x=3 THEN L 1 57 IF z=6 OR z=8 OR z=9 THEN L 1 56 IF y=3 OR y=6 OR y=9 THEN L 1 55 IF x=8 OR z=9 THEN LET u=24 1 52 LET z= INT ( RND *9)+1 1 51 LET y= INT ( RND *9)+1 1 50 LET x= INT ( RND *9)+1 1 46 POKE 23613,0 1 45 FOR F= 0 TO 1 1 40 FOR c=0 TO 10 1 20 LET a=25: LET p=0: POKE 236 1 10 CLS : LET g=0: LET u=246: L 1 );"LA -- ESCALERA": 1 );"Gabriel Rodriguez Calzada": 1 );" PREMIO MAXIMO ": 1 "2cdeFG","2efg2F","2gab3A": 1 "2cd2G","2dcf2G","2fgd3F": 1 "2c","2dcf1F","2fgd" 1 "2abG","2Gcdeedf" 1 "2GF","2ED","4BC" 1 "2GF","2ED","2BC" 1 "2GA","1CD","3GF": 1 "1g1G1a1A","1f1F1b1B","1d1D1c1C" 1 "1AB","1CD","1EF": 1 RND *5);"Gabriel Rodriguez 1 CASIO FX-880P y similares" 1 : RETURN